“The rats are absolutely going to hate this announcement. But the rats don’t run this city, we do.”

  • Jessica Tisch, New York City’s sanitation commissioner

Rat Sightings and Trash Collection

rat_merge_2 = 
  rat_merge_df |>
  ggplot(aes(longitude, latitude)) +
  geom_point() +
  theme_map()

rat_map = 
  leaflet(data = rat_merge_df) |> 
  addTiles() |> 
  addMarkers(
    lng = ~longitude,
    lat = ~latitude,
    clusterOptions = markerClusterOptions())

rat_map